home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC Gamer (Italian) 36
/
PC Gamer IT CD 36 2-2.iso
/
utility
/
pmio12
/
Pmio.ex_
/
0
/
RCDATA
/
TANIMFORM1
/
TANIMFORM1.txt
< prev
Wrap
Text File
|
1998-10-17
|
10KB
|
324 lines
object AnimForm1: TAnimForm1
Left = 13
Top = 154
Width = 290
Height = 258
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
ActiveControl = AnimTrackBar
BorderIcons = [biSystemMenu]
BorderStyle = bsSizeToolWin
Caption = 'anumasin'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsStayOnTop
Icon.Data = {<image000.ico>}
KeyPreview = True
PopupMenu = AnimPopupMenu
Position = poDefault
OnCreate = FormCreate
OnDestroy = FormDestroy
OnHide = FormHide
OnKeyDown = FormKeyDown
OnPaint = FormPaint
OnResize = FormResize
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object AnimPaintBox: TPaintBox
Left = 0
Top = 27
Width = 282
Height = 184
Align = alClient
OnDblClick = Open1Click
end
object AnimTrackBar: TTrackBar
Left = -2
Top = 182
Width = 284
Height = 23
LineSize = 5
Max = 100
Orientation = trHorizontal
ParentShowHint = False
PageSize = 10
Frequency = 5
Position = 50
SelEnd = 0
SelStart = 0
ShowHint = True
TabOrder = 0
TickMarks = tmBottomRight
TickStyle = tsAuto
OnChange = AnimTrackBarChange
end
object AnimStatusBar: TStatusBar
Left = 0
Top = 211
Width = 282
Height = 19
Panels = <
item
Alignment = taCenter
Text = 'n'
Width = 50
end
item
Text = 'size'
Width = 100
end
item
Text = 'file'
Width = 500
end>
SimplePanel = False
end
object Panel2: TPanel
Left = 0
Top = 0
Width = 282
Height = 27
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 2
object AnimBackTool: TToolbarButton97
Left = 2
Top = 2
Width = 23
Height = 22
AllowAllUp = True
DisplayMode = dmGlyphOnly
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000CE0E0000D80E00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222
2222222222222222222222222022222220222222002222220022222000222220
0022220002222200022220002222200022220002222200022222000222220002
2222200022222000222222000222220002222220002222200022222200222222
0022222220222222202222222222222222222222222222222222}
ParentShowHint = False
ShowHint = True
OnClick = AnimBackToolClick
end
object AnimAdvanceTool: TToolbarButton97
Left = 25
Top = 2
Width = 23
Height = 22
AllowAllUp = True
DisplayMode = dmGlyphOnly
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000CE0E0000D80E00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222
2222222222222222222220222222202222222002222220022222200022222000
2222220002222200022222200022222000222222000222220002222200022222
0002222000222220002222000222220002222000222220002222200222222002
2222202222222022222222222222222222222222222222222222}
ParentShowHint = False
ShowHint = True
OnClick = AnimAdvanceToolClick
end
object AnimReversePlayTool: TToolbarButton97
Left = 48
Top = 2
Width = 23
Height = 22
GroupIndex = 1
DisplayMode = dmGlyphOnly
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000CE0E0000D80E00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222
2222222222222222222222222222022222222222222002222222222222000222
2222222220000222222222220000022222222220000002222222222000000222
2222222200000222222222222000022222222222220002222222222222200222
2222222222220222222222222222222222222222222222222222}
ParentShowHint = False
ShowHint = True
OnClick = AnimReversePlayToolClick
end
object AnimStopTool: TToolbarButton97
Left = 71
Top = 2
Width = 23
Height = 22
GroupIndex = 1
DisplayMode = dmGlyphOnly
Down = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000CE0E0000D80E00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222
2222222222222222222222222222222222222200000000002222220000000000
2222220000000000222222000000000022222200000000002222220000000000
2222220000000000222222000000000022222200000000002222220000000000
2222222222222222222222222222222222222222222222222222}
ParentShowHint = False
ShowHint = True
OnClick = AnimStopToolClick
end
object AnimPlayTool: TToolbarButton97
Left = 94
Top = 2
Width = 23
Height = 22
GroupIndex = 1
DisplayMode = dmGlyphOnly
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000CE0E0000D80E00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222
2222222222222222222222222022222222222222200222222222222220002222
2222222220000222222222222000002222222222200000022222222220000002
2222222220000022222222222000022222222222200022222222222220022222
2222222220222222222222222222222222222222222222222222}
ParentShowHint = False
ShowHint = True
OnClick = AnimPlayToolClick
end
object AnimOpenTool: TToolbarButton97
Left = 120
Top = 2
Width = 23
Height = 22
DisplayMode = dmGlyphOnly
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000CE0E0000C40E00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
77777777777777777777000000000007777700666666666077770E0666666666
07770FE06666666660770EFE0666666666070FEFE000000000000EFEFEFEFE07
77770FEFEFEFEF0777770EFE0000000777777000777777770007777777777777
7007777777770777070777777777700077777777777777777777}
ParentShowHint = False
ShowHint = True
OnClick = Open1Click
end
object AnimRemoveTool: TToolbarButton97
Left = 143
Top = 2
Width = 23
Height = 22
AllowAllUp = True
DisplayMode = dmGlyphOnly
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000CE0E0000D80E00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777777777777777777717777777771777711177777771777771117777771
7777777111777711777777771117711777777777711111777777777777111777
7777777771111177777777771117717777777711117777117777711117777771
1777711777777777117777777777777777777777777777777777}
ParentShowHint = False
ShowHint = True
OnClick = Remove1Click
end
object AnimRemoveAllTool: TToolbarButton97
Left = 166
Top = 2
Width = 23
Height = 22
Hint = 'Remove All|Removes all animation frames'
DisplayMode = dmGlyphOnly
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000CE0E0000C40E00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222
2222222222222222222222222222222222222800000082222222207777770022
2222207777770802222228077777088022222207F7F7F088022222207F7F7F08
8022222207F7F7F088822222207F7F7F080222222207F7F7F802222222207F7F
7702222222228000088222222222222222222222222222222222}
ParentShowHint = False
ShowHint = True
OnClick = RemoveAll1Click
end
object Bevel2: TBevel
Left = 118
Top = 2
Width = 2
Height = 21
end
object Bevel1: TBevel
Left = 190
Top = 2
Width = 2
Height = 21
end
object AnimLoopCheck: TCheckBox
Left = 198
Top = 5
Width = 71
Height = 17
Caption = '&Loop'
ParentShowHint = False
ShowHint = True
State = cbChecked
TabOrder = 0
end
end
object AnimTimer: TTimer
Enabled = False
Interval = 100
OnTimer = AnimTimerTimer
Left = 216
Top = 45
end
object AnimPopupMenu: TPopupMenu
Left = 216
Top = 104
object Open1: TMenuItem
Caption = 'open'
Default = True
ShortCut = 0
OnClick = Open1Click
end
object SelectThumbnail1: TMenuItem
Caption = 'sel'
ShortCut = 0
OnClick = SelectThumbnail1Click
end
object N1: TMenuItem
Caption = '-'
ShortCut = 0
end
object Play1: TMenuItem
Caption = 'play'
ShortCut = 0
OnClick = AnimPlayToolClick
end
object Stop1: TMenuItem
Caption = 'stop'
ShortCut = 0
OnClick = AnimStopToolClick
end
object N2: TMenuItem
Caption = '-'
ShortCut = 0
end
object Remove1: TMenuItem
Caption = 'rem'
ShortCut = 0
OnClick = Remove1Click
end
object RemoveAll1: TMenuItem
Caption = 'rem all'
ShortCut = 0
OnClick = RemoveAll1Click
end
end
end